home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / P / Portfolio.cpt / Home / background_2282.txt < prev    next >
Text File  |  1988-01-24  |  18KB  |  799 lines
  1. -- background: 2282 from stack: in
  2. -- bmap block id: 3666
  3. -- flags: 4000
  4. -- background id: 0
  5. -- name: Home
  6. ----- HyperTalk script -----
  7. On OpenCard
  8.   Show MenuBar
  9.   Hide message window
  10. End OpenCard
  11.  
  12.  
  13. -- part 38 (button)
  14. -- low flags: 00
  15. -- high flags: 2000
  16. -- rect: left=489 top=34 right=47 bottom=512
  17. -- title width / last selected line: 0
  18. -- icon id / first selected line: 0 / 0
  19. -- text alignment: 1
  20. -- font id: 0
  21. -- text size: 12
  22. -- style flags: 0
  23. -- line height: 16
  24. -- part name: A
  25. ----- HyperTalk script -----
  26. on mouseUp
  27.   visual effect barn door open
  28.   go to card id 26629
  29. end mouseUp
  30.  
  31.  
  32.  
  33.  
  34. -- part 130 (button)
  35. -- low flags: 00
  36. -- high flags: 2000
  37. -- rect: left=489 top=46 right=58 bottom=512
  38. -- title width / last selected line: 0
  39. -- icon id / first selected line: 0 / 0
  40. -- text alignment: 1
  41. -- font id: 0
  42. -- text size: 12
  43. -- style flags: 0
  44. -- line height: 16
  45. -- part name: B
  46. ----- HyperTalk script -----
  47. on mouseUp
  48.   visual effect barn door open
  49.   go to card id 3863
  50. end mouseUp
  51.  
  52.  
  53.  
  54.  
  55. -- part 131 (button)
  56. -- low flags: 00
  57. -- high flags: 2000
  58. -- rect: left=489 top=57 right=69 bottom=512
  59. -- title width / last selected line: 0
  60. -- icon id / first selected line: 0 / 0
  61. -- text alignment: 1
  62. -- font id: 0
  63. -- text size: 12
  64. -- style flags: 0
  65. -- line height: 16
  66. -- part name: C
  67. ----- HyperTalk script -----
  68. on mouseUp
  69.   visual effect barn door open
  70.   go to card id 4915
  71. end mouseUp
  72.  
  73.  
  74.  
  75.  
  76. -- part 132 (button)
  77. -- low flags: 00
  78. -- high flags: 2000
  79. -- rect: left=489 top=68 right=80 bottom=512
  80. -- title width / last selected line: 0
  81. -- icon id / first selected line: 0 / 0
  82. -- text alignment: 1
  83. -- font id: 0
  84. -- text size: 12
  85. -- style flags: 0
  86. -- line height: 16
  87. -- part name: D
  88. ----- HyperTalk script -----
  89. on mouseUp
  90.   visual effect barn door open
  91.   go to card id 6228
  92. end mouseUp
  93.  
  94.  
  95.  
  96.  
  97. -- part 133 (button)
  98. -- low flags: 00
  99. -- high flags: 2000
  100. -- rect: left=489 top=79 right=91 bottom=512
  101. -- title width / last selected line: 0
  102. -- icon id / first selected line: 0 / 0
  103. -- text alignment: 1
  104. -- font id: 0
  105. -- text size: 12
  106. -- style flags: 0
  107. -- line height: 16
  108. -- part name: E
  109. ----- HyperTalk script -----
  110. on mouseUp
  111.   visual effect barn door open
  112.   go to card id 6788
  113. end mouseUp
  114.  
  115.  
  116.  
  117.  
  118. -- part 134 (button)
  119. -- low flags: 00
  120. -- high flags: 2000
  121. -- rect: left=489 top=90 right=102 bottom=512
  122. -- title width / last selected line: 0
  123. -- icon id / first selected line: 0 / 0
  124. -- text alignment: 1
  125. -- font id: 0
  126. -- text size: 12
  127. -- style flags: 0
  128. -- line height: 16
  129. -- part name: F
  130. ----- HyperTalk script -----
  131. on mouseUp
  132.   visual effect barn door open
  133.   go to card id 7102
  134. end mouseUp
  135.  
  136.  
  137.  
  138.  
  139. -- part 135 (button)
  140. -- low flags: 00
  141. -- high flags: 2000
  142. -- rect: left=489 top=101 right=113 bottom=512
  143. -- title width / last selected line: 0
  144. -- icon id / first selected line: 0 / 0
  145. -- text alignment: 1
  146. -- font id: 0
  147. -- text size: 12
  148. -- style flags: 0
  149. -- line height: 16
  150. -- part name: G
  151. ----- HyperTalk script -----
  152. on mouseUp
  153.   visual effect barn door open
  154.   go to card id 7447
  155. end mouseUp
  156.  
  157.  
  158.  
  159.  
  160. -- part 136 (button)
  161. -- low flags: 00
  162. -- high flags: 2000
  163. -- rect: left=489 top=112 right=124 bottom=512
  164. -- title width / last selected line: 0
  165. -- icon id / first selected line: 0 / 0
  166. -- text alignment: 1
  167. -- font id: 0
  168. -- text size: 12
  169. -- style flags: 0
  170. -- line height: 16
  171. -- part name: H
  172. ----- HyperTalk script -----
  173. on mouseUp
  174.   visual effect barn door open
  175.   go to card id 7695
  176. end mouseUp
  177.  
  178.  
  179.  
  180.  
  181. -- part 137 (button)
  182. -- low flags: 00
  183. -- high flags: 2000
  184. -- rect: left=489 top=123 right=135 bottom=512
  185. -- title width / last selected line: 0
  186. -- icon id / first selected line: 0 / 0
  187. -- text alignment: 1
  188. -- font id: 0
  189. -- text size: 12
  190. -- style flags: 0
  191. -- line height: 16
  192. -- part name: I
  193. ----- HyperTalk script -----
  194. on mouseUp
  195.   visual effect barn door open
  196.   go to card id 8142
  197. end mouseUp
  198.  
  199.  
  200.  
  201.  
  202. -- part 138 (button)
  203. -- low flags: 00
  204. -- high flags: 2000
  205. -- rect: left=489 top=134 right=146 bottom=512
  206. -- title width / last selected line: 0
  207. -- icon id / first selected line: 0 / 0
  208. -- text alignment: 1
  209. -- font id: 0
  210. -- text size: 12
  211. -- style flags: 0
  212. -- line height: 16
  213. -- part name: J
  214. ----- HyperTalk script -----
  215. on mouseUp
  216.   visual effect barn door open
  217.   go to card id 8255
  218. end mouseUp
  219.  
  220.  
  221.  
  222.  
  223. -- part 139 (button)
  224. -- low flags: 00
  225. -- high flags: 2000
  226. -- rect: left=489 top=145 right=157 bottom=512
  227. -- title width / last selected line: 0
  228. -- icon id / first selected line: 0 / 0
  229. -- text alignment: 1
  230. -- font id: 0
  231. -- text size: 12
  232. -- style flags: 0
  233. -- line height: 16
  234. -- part name: K
  235. ----- HyperTalk script -----
  236. on mouseUp
  237.   visual effect barn door open
  238.   go to card id 8566
  239. end mouseUp
  240.  
  241.  
  242.  
  243.  
  244. -- part 140 (button)
  245. -- low flags: 00
  246. -- high flags: 2000
  247. -- rect: left=489 top=156 right=168 bottom=512
  248. -- title width / last selected line: 0
  249. -- icon id / first selected line: 0 / 0
  250. -- text alignment: 1
  251. -- font id: 0
  252. -- text size: 12
  253. -- style flags: 0
  254. -- line height: 16
  255. -- part name: L
  256. ----- HyperTalk script -----
  257. on mouseUp
  258.   visual effect barn door open
  259.   go to card id 8878
  260. end mouseUp
  261.  
  262.  
  263.  
  264.  
  265. -- part 141 (button)
  266. -- low flags: 00
  267. -- high flags: 2000
  268. -- rect: left=489 top=167 right=180 bottom=512
  269. -- title width / last selected line: 0
  270. -- icon id / first selected line: 0 / 0
  271. -- text alignment: 1
  272. -- font id: 0
  273. -- text size: 12
  274. -- style flags: 0
  275. -- line height: 16
  276. -- part name: M
  277. ----- HyperTalk script -----
  278. on mouseUp
  279.   visual effect barn door open
  280.   go to card id 8984
  281. end mouseUp
  282.  
  283.  
  284.  
  285.  
  286. -- part 142 (button)
  287. -- low flags: 00
  288. -- high flags: 2000
  289. -- rect: left=489 top=179 right=191 bottom=512
  290. -- title width / last selected line: 0
  291. -- icon id / first selected line: 0 / 0
  292. -- text alignment: 1
  293. -- font id: 0
  294. -- text size: 12
  295. -- style flags: 0
  296. -- line height: 16
  297. -- part name: N
  298. ----- HyperTalk script -----
  299. on mouseUp
  300.   visual effect barn door open
  301.   go to card id 9571
  302. end mouseUp
  303.  
  304.  
  305.  
  306.  
  307. -- part 143 (button)
  308. -- low flags: 00
  309. -- high flags: 2000
  310. -- rect: left=489 top=190 right=202 bottom=512
  311. -- title width / last selected line: 0
  312. -- icon id / first selected line: 0 / 0
  313. -- text alignment: 1
  314. -- font id: 0
  315. -- text size: 12
  316. -- style flags: 0
  317. -- line height: 16
  318. -- part name: O
  319. ----- HyperTalk script -----
  320. on mouseUp
  321.   visual effect barn door open
  322.   go to card id 9912
  323. end mouseUp
  324.  
  325.  
  326.  
  327.  
  328. -- part 144 (button)
  329. -- low flags: 00
  330. -- high flags: 2000
  331. -- rect: left=489 top=200 right=212 bottom=512
  332. -- title width / last selected line: 0
  333. -- icon id / first selected line: 0 / 0
  334. -- text alignment: 1
  335. -- font id: 0
  336. -- text size: 12
  337. -- style flags: 0
  338. -- line height: 16
  339. -- part name: P
  340. ----- HyperTalk script -----
  341. on mouseUp
  342.   visual effect barn door open
  343.   go to card id 10366
  344. end mouseUp
  345.  
  346.  
  347.  
  348.  
  349. -- part 145 (button)
  350. -- low flags: 00
  351. -- high flags: 2000
  352. -- rect: left=489 top=211 right=223 bottom=512
  353. -- title width / last selected line: 0
  354. -- icon id / first selected line: 0 / 0
  355. -- text alignment: 1
  356. -- font id: 0
  357. -- text size: 12
  358. -- style flags: 0
  359. -- line height: 16
  360. -- part name: Q
  361. ----- HyperTalk script -----
  362. on mouseUp
  363.   visual effect barn door open
  364.   go to card id 10817
  365. end mouseUp
  366.  
  367.  
  368.  
  369.  
  370. -- part 146 (button)
  371. -- low flags: 00
  372. -- high flags: 2000
  373. -- rect: left=489 top=222 right=234 bottom=512
  374. -- title width / last selected line: 0
  375. -- icon id / first selected line: 0 / 0
  376. -- text alignment: 1
  377. -- font id: 0
  378. -- text size: 12
  379. -- style flags: 0
  380. -- line height: 16
  381. -- part name: R
  382. ----- HyperTalk script -----
  383. on mouseUp
  384.   visual effect barn door open
  385.   go to card id 11084
  386. end mouseUp
  387.  
  388.  
  389.  
  390.  
  391. -- part 147 (button)
  392. -- low flags: 00
  393. -- high flags: 2000
  394. -- rect: left=489 top=233 right=245 bottom=512
  395. -- title width / last selected line: 0
  396. -- icon id / first selected line: 0 / 0
  397. -- text alignment: 1
  398. -- font id: 0
  399. -- text size: 12
  400. -- style flags: 0
  401. -- line height: 16
  402. -- part name: S
  403. ----- HyperTalk script -----
  404. on mouseUp
  405.   visual effect barn door open
  406.   go to card id 11472
  407. end mouseUp
  408.  
  409.  
  410.  
  411.  
  412. -- part 148 (button)
  413. -- low flags: 00
  414. -- high flags: 2000
  415. -- rect: left=489 top=244 right=256 bottom=512
  416. -- title width / last selected line: 0
  417. -- icon id / first selected line: 0 / 0
  418. -- text alignment: 1
  419. -- font id: 0
  420. -- text size: 12
  421. -- style flags: 0
  422. -- line height: 16
  423. -- part name: T
  424. ----- HyperTalk script -----
  425. on mouseUp
  426.   visual effect barn door open
  427.   go to card id 11586
  428. end mouseUp
  429.  
  430.  
  431.  
  432.  
  433. -- part 149 (button)
  434. -- low flags: 00
  435. -- high flags: 2000
  436. -- rect: left=489 top=255 right=267 bottom=512
  437. -- title width / last selected line: 0
  438. -- icon id / first selected line: 0 / 0
  439. -- text alignment: 1
  440. -- font id: 0
  441. -- text size: 12
  442. -- style flags: 0
  443. -- line height: 16
  444. -- part name: U
  445. ----- HyperTalk script -----
  446. on mouseUp
  447.   visual effect barn door open
  448.   go to card id 11818
  449. end mouseUp
  450.  
  451.  
  452.  
  453.  
  454. -- part 150 (button)
  455. -- low flags: 00
  456. -- high flags: 2000
  457. -- rect: left=489 top=266 right=278 bottom=512
  458. -- title width / last selected line: 0
  459. -- icon id / first selected line: 0 / 0
  460. -- text alignment: 1
  461. -- font id: 0
  462. -- text size: 12
  463. -- style flags: 0
  464. -- line height: 16
  465. -- part name: V
  466. ----- HyperTalk script -----
  467. on mouseUp
  468.   visual effect barn door open
  469.   go to card id 12215
  470. end mouseUp
  471.  
  472.  
  473.  
  474.  
  475. -- part 151 (button)
  476. -- low flags: 00
  477. -- high flags: 2000
  478. -- rect: left=489 top=277 right=289 bottom=512
  479. -- title width / last selected line: 0
  480. -- icon id / first selected line: 0 / 0
  481. -- text alignment: 1
  482. -- font id: 0
  483. -- text size: 12
  484. -- style flags: 0
  485. -- line height: 16
  486. -- part name: W
  487. ----- HyperTalk script -----
  488. on mouseUp
  489.   visual effect barn door open
  490.   go to card id 12364
  491. end mouseUp
  492.  
  493.  
  494.  
  495.  
  496. -- part 152 (button)
  497. -- low flags: 00
  498. -- high flags: 2000
  499. -- rect: left=489 top=288 right=300 bottom=512
  500. -- title width / last selected line: 0
  501. -- icon id / first selected line: 0 / 0
  502. -- text alignment: 1
  503. -- font id: 0
  504. -- text size: 12
  505. -- style flags: 0
  506. -- line height: 16
  507. -- part name: X
  508. ----- HyperTalk script -----
  509. on mouseUp
  510.   visual effect barn door open
  511.   go to card id 12614
  512. end mouseUp
  513.  
  514.  
  515.  
  516.  
  517. -- part 153 (button)
  518. -- low flags: 00
  519. -- high flags: 2000
  520. -- rect: left=489 top=299 right=311 bottom=512
  521. -- title width / last selected line: 0
  522. -- icon id / first selected line: 0 / 0
  523. -- text alignment: 1
  524. -- font id: 0
  525. -- text size: 12
  526. -- style flags: 0
  527. -- line height: 16
  528. -- part name: Y
  529. ----- HyperTalk script -----
  530. on mouseUp
  531.   visual effect barn door open
  532.   go to card id 13003
  533. end mouseUp
  534.  
  535.  
  536.  
  537.  
  538. -- part 154 (button)
  539. -- low flags: 00
  540. -- high flags: 2000
  541. -- rect: left=489 top=310 right=323 bottom=512
  542. -- title width / last selected line: 0
  543. -- icon id / first selected line: 0 / 0
  544. -- text alignment: 1
  545. -- font id: 0
  546. -- text size: 12
  547. -- style flags: 0
  548. -- line height: 16
  549. -- part name: Z
  550. ----- HyperTalk script -----
  551. on mouseUp
  552.   visual effect barn door open
  553.   go to card id 13155
  554. end mouseUp
  555.  
  556.  
  557.  
  558.  
  559. -- part 157 (button)
  560. -- low flags: 00
  561. -- high flags: 2004
  562. -- rect: left=38 top=74 right=111 bottom=91
  563. -- title width / last selected line: 0
  564. -- icon id / first selected line: 26405 / 26405
  565. -- text alignment: 1
  566. -- font id: 0
  567. -- text size: 12
  568. -- style flags: 0
  569. -- line height: 16
  570. -- part name: System
  571. ----- HyperTalk script -----
  572. On MouseDown
  573.   Put the MouseLoc into MyPlace
  574.   Put item 1 of myPlace + 5 into horiz
  575.   Put item 2 of myPlace - 5 into vert
  576.   Get PopUpMenu("Launch Application...;-;Delete A File...;"& "Rename A File...;-;Quit Portfolio;-;Shut Down",0, vert, horiz)
  577.   Set hilite of background button "System" to false
  578.   If it < "1" then
  579.     Exit MouseDown
  580.   End if
  581.   ----------------------------------------------------------------------
  582.   -- DIRECT LAUNCH
  583.   ----------------------------------------------------------------------
  584.   If it = "1" then
  585.     DirectLaunch
  586.   End if
  587.   ----------------------------------------------------------------------
  588.   -- DELETE A FILE
  589.   ----------------------------------------------------------------------
  590.   If it = "3" then
  591.     TrashAny
  592.   End if
  593.   ----------------------------------------------------------------------
  594.   -- RENAME A FILE
  595.   ----------------------------------------------------------------------
  596.   If it = "4" then
  597.     RenameAny
  598.   End if
  599.   ----------------------------------------------------------------------
  600.   -- QUIT
  601.   ----------------------------------------------------------------------
  602.   If it = "6" then
  603.     DoMenu Quit HyperCard
  604.   End if
  605.   ----------------------------------------------------------------------
  606.   -- SHUT DOWN
  607.   ----------------------------------------------------------------------
  608.   If it = "8" then
  609.     ShutOff
  610.   End if
  611. End MouseDown
  612.  
  613.  
  614.  
  615.  
  616.  
  617. -- part 158 (button)
  618. -- low flags: 00
  619. -- high flags: 2004
  620. -- rect: left=38 top=274 right=295 bottom=91
  621. -- title width / last selected line: 0
  622. -- icon id / first selected line: 6720 / 6720
  623. -- text alignment: 1
  624. -- font id: 0
  625. -- text size: 12
  626. -- style flags: 0
  627. -- line height: 16
  628. -- part name: Back
  629. ----- HyperTalk script -----
  630. On MouseUp
  631.   Visual effect barn door open
  632.   DoMenu Back
  633. End MouseUp
  634.  
  635.  
  636.  
  637. -- part 159 (button)
  638. -- low flags: 00
  639. -- high flags: 2004
  640. -- rect: left=66 top=298 right=319 bottom=91
  641. -- title width / last selected line: 0
  642. -- icon id / first selected line: 16560 / 16560
  643. -- text alignment: 1
  644. -- font id: 0
  645. -- text size: 12
  646. -- style flags: 0
  647. -- line height: 16
  648. -- part name: Next
  649. ----- HyperTalk script -----
  650. on mouseUp
  651.   visual effect barn door open
  652.   go to next card
  653. end mouseUp
  654.  
  655.  
  656.  
  657. -- part 160 (button)
  658. -- low flags: 00
  659. -- high flags: 2004
  660. -- rect: left=38 top=298 right=319 bottom=63
  661. -- title width / last selected line: 0
  662. -- icon id / first selected line: 15420 / 15420
  663. -- text alignment: 1
  664. -- font id: 0
  665. -- text size: 12
  666. -- style flags: 0
  667. -- line height: 16
  668. -- part name: Prev
  669. ----- HyperTalk script -----
  670. on mouseUp
  671.   visual effect barn door open
  672.   go to previous card
  673. end mouseUp
  674.  
  675.  
  676.  
  677. -- part 161 (button)
  678. -- low flags: 00
  679. -- high flags: 2004
  680. -- rect: left=38 top=34 right=71 bottom=91
  681. -- title width / last selected line: 0
  682. -- icon id / first selected line: 3479 / 3479
  683. -- text alignment: 1
  684. -- font id: 0
  685. -- text size: 12
  686. -- style flags: 0
  687. -- line height: 16
  688. -- part name: Portfolio
  689. ----- HyperTalk script -----
  690. On MouseDown
  691.   Put the MouseLoc into MyPlace
  692.   Put item 1 of MyPlace + 5 into horiz
  693.   Put item 2 of MyPlace - 5 into vert
  694.   Get PopUpMenu("Portfolio \ Home Card;-;"& "User Preferences...;PathWay Structures...;-;Scan All Cards...;-;"& "Accounting;Communications;Database Management;"& "Desktop Publishing;Graphics;Ideas;Music \ Sounds;SpreadSheets;"& "Utilities;Word Processing",0, vert, horiz)
  695.   Set hilite of background button "Portfolio" to false
  696.   If it < "1" then
  697.     Exit MouseDown
  698.   End if
  699.   ----------------------------------------------------------------------
  700.   -- HOME CARD
  701.   ----------------------------------------------------------------------
  702.   If it = 1 then
  703.     Visual effect barn door open
  704.     Go to card id 5341
  705.   End if
  706.   ----------------------------------------------------------------------
  707.   -- USER PREFERENCES
  708.   ----------------------------------------------------------------------
  709.   If it = 3 then
  710.     Visual effect barn door open
  711.     Go to card id 3012
  712.   End if
  713.   ----------------------------------------------------------------------
  714.   -- PATHWAY STRUCTURES
  715.   ----------------------------------------------------------------------
  716.   If it = 4 then
  717.     Visual effect barn door open
  718.     Go to card id 5437
  719.   End if
  720.   ----------------------------------------------------------------------
  721.   -- SCAN ALL CARDS
  722.   ----------------------------------------------------------------------
  723.   If it = 6 then
  724.     ScanCards
  725.   End if
  726.   ----------------------------------------------------------------------
  727.   -- ACCOUNTING
  728.   ----------------------------------------------------------------------
  729.   If it = 8 then
  730.     Visual effect barn door open
  731.     Go to card id 13370
  732.   End if
  733.   ----------------------------------------------------------------------
  734.   -- COMMUNICATIONS
  735.   ----------------------------------------------------------------------
  736.   If it = 9 then
  737.     Visual effect barn door open
  738.     Go to card id 13960
  739.   End if
  740.   ----------------------------------------------------------------------
  741.   -- DATABASE MANAGEMENT
  742.   ----------------------------------------------------------------------
  743.   If it = 10 then
  744.     Visual effect barn door open
  745.     Go to card id 4691
  746.   End if
  747.   ----------------------------------------------------------------------
  748.   -- DESKTOP PUBLISHING
  749.   ----------------------------------------------------------------------
  750.   If it = 11 then
  751.     Visual effect barn door open
  752.     Go to card id 16794
  753.   End if
  754.   ----------------------------------------------------------------------
  755.   -- GRAPHICS
  756.   ----------------------------------------------------------------------
  757.   If it = 12 then
  758.     Visual effect barn door open
  759.     Go to card id 16898
  760.   End if
  761.   ----------------------------------------------------------------------
  762.   -- IDEAS
  763.   ----------------------------------------------------------------------
  764.   If it = 13 then
  765.     Visual effect barn door open
  766.     Go to card id 17208
  767.   End if
  768.   ----------------------------------------------------------------------
  769.   -- MUSIC \ SOUNDS
  770.   ----------------------------------------------------------------------
  771.   If it = 14 then
  772.     Visual effect barn door open
  773.     Go to card id 17559
  774.   End if
  775.   ----------------------------------------------------------------------
  776.   -- SPREADSHEETS
  777.   ----------------------------------------------------------------------
  778.   If it = 15 then
  779.     Visual effect barn door open
  780.     Go to card id 17817
  781.   End if
  782.   ----------------------------------------------------------------------
  783.   -- UTILITIES
  784.   ----------------------------------------------------------------------
  785.   If it = 16 then
  786.     Visual effect barn door open
  787.     Go to card id 18051
  788.   End if
  789.   ----------------------------------------------------------------------
  790.   -- WORD PROCESSING
  791.   ----------------------------------------------------------------------
  792.   If it = 17 then
  793.     Visual effect barn door open
  794.     Go to card id 18344
  795.   End if
  796. End MouseDown
  797.  
  798.  
  799.